home *** CD-ROM | disk | FTP | other *** search
/ HaCKeRz Kr0nlcKLeZ 1 / HaCKeRz Kr0nlcKLeZ.iso / scriptz / tgt10p.exe / Disk_1.ZIP / councode.txt < prev    next >
Encoding:
Text File  |  1997-01-11  |  451 b   |  23 lines
  1. countcodes {
  2.   %num = $count(*1,)
  3.   %num = %num + $count(*1,)
  4.   %num = %num + $count(*1,)
  5.   %num = %num + $count(*1,)
  6.   %num = %num + $count(*1,)
  7.   return %num
  8. }
  9.  
  10. <----- copy to here -----
  11.  
  12. Now to use this, you call the routine from an identifier like this...
  13.  
  14.  
  15. 1:on text:*:*: {
  16.   if ($countcodes($parms) > 30) { 
  17.     msg $chan You have typed over 30 control codes, isn't that a bit much?
  18.   }
  19. }
  20.  
  21. That's it! Easy as pie. =)
  22.  
  23.